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LL 000000 cCcecece Kk KK DDDDDDDD  BBBBBBBB 

LL 000000 CCCCCCCE KK KK DDDDDDDD BBBBBBBB 

LL 00 00 ¢C KK KK DD DD BB gg 

LL 00 00 CC KK KK DD DD BB BB 

LL 00 00 CC Ss ee DD 8B 8B 

LL 00 00 CC KK KK DD dD 68 

LL 00 00 CC KKKKKK DD DD BBBBBBBB 

LL 00 oo cc KKKKKK DD DD 

LL 00 00 CC KK KK DD DD BB ae 
LL 00 00 CC KK KK DD DD BB er 

LL 00 00 CC KK KK DD DD BB BB oe 
LL 00 00 CC KK KK DD DD 8B ise pean 
LLLLLLLLLL = 000000 CCCCCCCC KK KK DDDDDDDD  BBBBBBBB ines 
LLLLLLLLLL §=©—-000000 CCCCCCCC KK KK DDDDDDDD = B8BBBBBB ate 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS fe ‘ieche ft. FURNISHED woeee A LICENSE AND MAY BE USED AND COPIED 
ONLY CCORDANCE THE TERMS OF CH 


AN 
INCLUSION OF THE ABOVE gdh NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
CORPORAT ibe NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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0 3+ 
9009 : FACILITY: F11ACP STRUCTURE LEVEL 1 
9000 : ABSTRACT: 
000 : THESE ROUTINES LOCK AND UNLOCK THE I/O DATA BASE MUTEX. | 
000 : NEEDLESS TO SAY, THEY MUST BE CALLED IN KERNEL MODE. 
900 : ENVIRONMENT: 
$00 : STARLE. OPERATING SYSTEM, INCLUDING PRIVILEGED SYSTEM SERVICES 
000 40: AND INTERNAL EXEC RCUTINE. 
O88 41 ; 
ar 
4 ? t AUTHOR: ANDREW C. GOLDSTEIN, CREATION DATE: 29-APR-1977 15:31 
4 46 : MODIFIED BY: 
: A0100 ACG00001 Andrew C. Goldstein, 10-Oct-1978 20:04 
3 Previous revision history moved to FIIA REV 
0 
0 
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SPRDEF ; DEFINE PROCESOR REGISTER NUMBERS 
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LOCK 
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FUNCTIONAL DESCRIPTION: 
THIS ROUTINE LOCKS THE 1/0 DATA BASE MUTEX. 


60 : 
1 3; CALLING SEQUENCE: 
° ; CALL LOCK_I10DB () 
64 : INPUT PARAMETERS: 
o? 3 NONE 
67 ; IMPLICIT INPUTS: 
0000 68 ; NONE 
0000 9; 
0000 0 : OUTPUT PARAMETERS: 
990 71; NONE 
op i : 
000 73 ; IMPLICIT OUTPUTS: 
0000 74; NONE 
0000 «75; 
900 16 : ROUTINE VALUE: 
445 ‘7 3: NONE 
990 78 ; 
000 79 ; SIDE EFFECTS: 
9000 9 : 1/0 DATA BASE MUTEX LOCKED | 
$090 é i-- 
0000 
00000000 4 -PSECT $LOCKEDC1$,NOWRT 
000 6 LOCK_IODB:: | 
003c 000 7 .WORD “M<R2,R3,R4,R5> ; SAVE REGISTERS 
50 00000000'9F DE 000 88 MOVAL a#10C$GLMUTEX,RO : GET 1/0 DATA BASE MUTEX | 
54 00000000'9F 00 000 89 MOVL oaSCHScL tURP CB. RG : GET OWN PCB ADDRESS 
00000000'9F 16 + JSB aaSCHSLOCKW ; AND LOCK IT 
| 
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FUNCTIONAL DESCRIPTION: 
THIS ROUTINE UNLOCKS THE I/0 DATA BASE MUTEX. 


CALLING SEQUENCE: 
CALL UNLOCK_10DB () 


INPUT PARAMETERS: 
NONE 


IMPLICIT INPUTS: 
NONE 


oo 


OUTPUT PARAMETERS: 
NONE 

IMPLICIT OUTPUTS: 
NONE 


ROUTINE VALUE: 
NONE 


1/0 DATA BASE MUTEX UNLOCKED 
IPL LOWERED TO 0 


UNLOCK_IODB: : 
. WORD 


“M<R2,R3,R4,R5> ; SAVE REGISTERS 


AAAI AIA IID St tS St St SS SS SS SS SS SS 
== 99 NO 0 aaa 
WAAR RIPUDINININIDY 2 OS S| SOOOOOOOOOOWDO 

WO OO NA NE WIN 0 OODNO UNE WIN 0 OO NONE WIN  O OONOAUE W 


be a st 8 tn a tb 5 bs 2b > 2» 2s —s > 2s 2 tt 
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‘ MOVAL a#I10C$GL_MUTEX,RO : GET 1/0 DATA BASE MUTEX 
54 00000000'9F 00 MOVL a#SCHS$GL~CURPCB,R4 ; AND OWN PCB ADDRESS 
‘OF 16 SB a#SCHSUNCOCK 3 AND UNLOCK IT 
SETIPL #0 ; ALSO LOWER IPL 
04 ET 
END 


| 
| 
| 
SIDE EFFECTS: | 
| 
| 
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LOCKDB = LOCK AND UNLOCK 1/0 DATA BASE 15-SEP-1984 23:43:45 VAX/VMS Macro V04-00 Page 4. 
Symbol table reset 83:48:33 FP TX SRCILOCKDB MAR: 1 . (3) | 
ACL_TYPE = é 
AQB “TYPE = gb | 
BITMAP _TYPE = sus 
CACHE_ TYPE s a 
CHIP_TYPE = | SS 
| DATA" TYPE : 2] 
DIRECTORY_TYPE = ee 
FCB TYPE = | ie 
HEABDER_TY = 3 4 
INDEX TYPE = ; 3 
10C¢ MUTEX geeetere x sf) e= 3 
LOCK_I6pB RG pe 
mVL TYPE = a5 
PRS_I = 1 j 
QUOTA_TYPE = 0 
RVT_TYPE s 
SCHSGL_CURPCB teererer we 8 
SCHSLOCKW eeeneene x | 
SCHSUNLOCK tereeree XK 0 
UNLOCK 10DB 00000017 RG sO 
vCB_TYPE = 00000002 
WCB_TYPE = 00000001 
oer eeees eee een ee * 
: Psect synopsis ! 

PSECT name Allocation PSECT No. Attributes 
. . 00000000 < 0.) 00 ¢ OO.) NOPIC USR CON’ ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS 00000000 0.) O1¢ 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE i 
SLOCKEDC1$ 00000031 ¢ 49.) 02 ¢ 2.) NOPIC USR CON REL LCL NUSHR EXE RD NOWRT NOVEC BYTE 

dosceceeessoescesoossesese + 

! Performance indicators ! | 

¢eeceeoan rece ese eee s ean ecece + 
Phase Page faults CPU Time Elapsed Time 
Initialization 36 00:00: 8-09 0:00:00.45 
Command processing 141 0:00:00.73 8: 0:02.95 
Pass 135 0: + 1.45 :00:04.95 
Symbol table sort 0:00: 8-99 0:00:00.20 
Pass 2 3 : 8: 57 3: 701.84 
Symbol iable output 3 :00:00.03 :00:00. 
Psect synopsis output 1 8: 8: Be 0:00:00.0 
Cross-reference output g :00: 3. 0:0 1 
Assembler run totals 35 0:00:02.99 0:00:10.4 


Teg wort ing set Limit was 1200 pages. 

6 bytes (13 pages) of virtual memory were used to buffer the intermediate code. 

There were 10 pages of symbol table space pe yceeree to hold 101 non-local and 0 local symbols. 
source Lines were read in Pass 1, producing 13 object records in Pass 2. 

1 pages of virtual memory were used to define 10 macros. 
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VAK-11 Macro Run Statistics -SEP-1984 F11X.SRCJLOCKDB.MAR; 1 
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! Macro Library statistics ! 


bom wn ee nor sec ree meee eee eee} 


Macro Library name Macros defined 
$255SDUA e: SYS.OBJJLIB.MLB;1 1 
$255$0UA28 :(SYSLIBISTARLET. MLB; 2 4 

me (all libraries) 5 


146 GETS were required to define 5 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:LOCKDB/OBJ=OBJ$:LOCKDB MSRC$:F CPPRE/UPDATE=(ENH$:F CPPRE) +MSRC$:LOCKDB/UPDATE=(ENH$:LOCKDB) +EXECML$/LIB 
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